# -*- coding: utf-8; mode: snippet -*-
# name: print %hash
# key: lhash.
# contributor: Chen Bin <chenbin DOT sh AT gmail>
# --
print "hash %${1:h}:\n"; print "\$_=>\$${1:$(yas/substr yas-text "[^ ]*")}{\$_}\n" for (keys %${1:$(yas/substr yas-text "[^ ]*")});